This page offers a visualization of the songs that Fugazi performed live using metadata from the Fugazi Live Series.
The visualization uses results of a previous analysis process that can be found in the summary table of the Repeatr package.
Let’s get the data, limit it to the columns that we will be using, and have a look at the first few rows.
mygraphdata <- summary %>%
select(song, launchdate, chosen, release, rating)
head(mygraphdata)
#> # A tibble: 6 x 5
#> song launchdate chosen release rating
#> <chr> <date> <dbl> <chr> <dbl>
#> 1 bed for the scraping 1994-11-20 299 Red Medicine 1
#> 2 reclamation 1990-05-05 594 Steady Diet 0.997
#> 3 break 1996-08-15 170 End Hits 0.996
#> 4 do you like me 1994-11-20 272 Red Medicine 0.968
#> 5 closed captioned 1997-06-18 158 End Hits 0.947
#> 6 cashout 2000-09-30 59 The Argument 0.938Now let’s graph the data. The idea is to plot each song as a bubble, with the x-coordinate given by the launch date, and the y-coordinate given by the rating calculated from the choice modelling of the Fugazi Live Series data. The size of the bubble will be proportional to the number of times the song was played live, while the color of the bubble will indicate the associated release in the band’s discography. There will be a lot of information packed into this graph!
p <- mygraphdata %>%
ggplot( aes(x=launchdate, y=rating, size = chosen, color=release, label=song)) +
geom_point(shape = 1) +
theme_bw()
ggplotly(p)The graph is interactive:
hover over a song to see specific details about the song
tap on a release in the legend to hide the corresponding bubbles, tap on the release again to reveal them once more. This is useful to focus on one or more specific releases by hiding the others.
Enjoy!